Profile of (eval 388)[Sub/Quote.pm:3]

Filename	(eval 388)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 14 statements in 206µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	11µs	31µs	JSON::Schema::Modern::Document::OpenAPI::BEGIN@7
1	1	1	6µs	17µs	Method::Generate::Accessor::_Generated::BEGIN@39.250
1	1	1	5µs	5µs	Method::Generate::Accessor::_Generated::BEGIN@12.249
0	0	0	0s	0s	JSON::Schema::Modern::Document::OpenAPI::_set_metaschema_uri

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	0s			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
3	1	0s			my $coerce_for_metaschema_5furi = ${$_[1]->{"\$coerce_for_metaschema_5furi"}};
4	1	0s			my $isa_check_for_metaschema_5furi = ${$_[1]->{"\$isa_check_for_metaschema_5furi"}};
5	1	1µs			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
6					package JSON::Schema::Modern::Document::OpenAPI;
7	2	50µs	2	51µs	# spent 31µs (11+20) within JSON::Schema::Modern::Document::OpenAPI::BEGIN@7 which was called: # once (11µs+20µs) by Sub::Quote::_clean_eval at line 7 no warnings 'closure'; # spent 31µs making 1 call to JSON::Schema::Modern::Document::OpenAPI::BEGIN@7 # spent 20µs making 1 call to warnings::unimport
8					sub _set_metaschema_uri {
9					($_QUOTED,$_UNQUOTED) if 0;
10					# BEGIN quote_sub PRELUDE
11					package Method::Generate::Accessor::_Generated;
12					# spent 5µs within Method::Generate::Accessor::_Generated::BEGIN@12.249 which was called: # once (5µs+0s) by Sub::Quote::_clean_eval at line 17 BEGIN {
13	1	1µs			$^H = 1762;
14	1	0s			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
15	1	3µs			%^H = (
16					);
17	1	61µs	1	5µs	} # spent 5µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@12.249
18					# END quote_sub PRELUDE
19					scalar do { my $value = do {
20					local $Method::Generate::Accessor::CurrentAttribute = {
21					init_arg => undef(),
22					name => "metaschema_uri",
23					step => "coercion",
24					};
25					(my $_return),
26					(my $_error), (my $_old_error = $@);
27					(eval {
28					($@ = $_old_error),
29					($_return =
30					$coerce_for_metaschema_5furi->($_[1])),
31					1
32					} or
33					$_error = CORE::ref $@ ? $@ : "coercion for \"metaschema_uri\" failed: ".$@);
34					($@ = $_old_error),
35					(defined $_error and CORE::die $_error);
36					$_return;
37					}
38					;
39	2	84µs	2	28µs	# spent 17µs (6+11) within Method::Generate::Accessor::_Generated::BEGIN@39.250 which was called: # once (6µs+11µs) by Sub::Quote::_clean_eval at line 39 (do { no warnings "void"; package Type::Tiny; ((Scalar::Util::blessed($value) and $value->isa(q[Mojo::URL]))) or Type::Tiny::_failed_check($isa_check_for_metaschema_5furi, "InstanceOf[\"Mojo::URL\"]", $value, "attribute_name","metaschema_uri","attribute_step","isa check","mgaca","0","varname","\$self->{\"metaschema_uri\"}"); $value }), # spent 17µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@39.250 # spent 11µs making 1 call to warnings::unimport
40					($_[0]->{"metaschema_uri"} = $value),
41					($_[0]->{"metaschema_uri"}),
42					} }
43	1	1µs			$$_UNQUOTED = \&_set_metaschema_uri;
44					}
45	1	5µs			1;
46
47					;